home *** CD-ROM | disk | FTP | other *** search
/ Aminet 44 / Aminet 44 (2001)(GTI - Schatztruhe)[!][Aug 2001].iso / Aminet / misc / emu / p-interp.lha / p-interp-0.4 / buildimages.sh < prev    next >
Linux/UNIX/POSIX Shell Script  |  2001-05-20  |  2KB  |  74 lines

  1. #!/bin/sh
  2. # P-Code interpreter (to run the apple pascal system)
  3. # Copyright (C) 2000 Mario Klebsch
  4. #
  5. # $Id: buildimages.sh,v 1.2 2001/05/20 13:12:02 mario Exp $
  6. #
  7. # This program is free software; you can redistribute it and/or modify
  8. # it under the terms of the GNU General Public License as published by
  9. # the Free Software Foundation; either version 2 of the License, or
  10. # (at your option) any later version.
  11. #
  12. # This program is distributed in the hope that it will be useful,
  13. # but WITHOUT ANY WARRANTY; without even the implied warranty of
  14. # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15. # GNU General Public License for more details.
  16. #
  17. # You should have received a copy of the GNU General Public License
  18. # along with this program; if not, write to the Free Software
  19. # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  20. #
  21. #
  22. # $Log: buildimages.sh,v $
  23. # Revision 1.2  2001/05/20 13:12:02  mario
  24. # CVS-Idents und Logs eingefügt
  25. #
  26. #
  27.  
  28. dd if=/dev/zero count=1024 of=work.svol
  29. dd if=/dev/zero count=1024 of=system.svol
  30.  
  31. TODAY=`LANG= date +%d-%b-%y`
  32.  
  33. ./ucsd -b -\
  34.     -f apple_pascal_1.dsk \
  35.     -r apple_pascal_2.dsk \
  36.     -r apple_pascal_3.dsk \
  37.     -r library.svol \
  38.     -w work.svol \
  39.     -w system.svol    <<**EOF
  40. fd$TODAY
  41. z#11
  42. n1024
  43. work:
  44. yz#12
  45. n1024
  46. system:
  47. yqxapple3:setup
  48. csHAS LOWER CASE
  49. yT
  50. nsSCREEN WIDTH
  51. y80
  52. nsKEY TO MOVE CURSOR DOWN
  53. y10
  54. nsKEY TO MOVE CURSOR UP
  55. y11
  56. nqqmde
  57. xapple3:library
  58. work:system.library
  59. apple1:system.library
  60. 0 0
  61. 1 1
  62. 2 2
  63. 3 3
  64. 6 6
  65. nlibrary:turt.lib.code
  66. 1 4
  67. 2 5
  68. qmodified turtlegraphics for UNIX based p-system
  69. ftapple1:new.miscinfo,work:system.miscinfo,apple1:system.pascal,system:$,apple1:system.filer,system:$,apple1:system.editor,system:$,apple1:system.syntax,work:$,apple2:system.compiler,system:$,apple2:system.linker,system:$
  70. tapple2:system.assmbler,system:$,apple2:6500.opcodes,system:$,apple2:6500.errors,system:$,apple3:library.code,system:$,apple3:libmap.code,system:$,apple3:setup.code,system:$,apple3:balanced.=,system:$
  71. tapple3:crossref.=,system:$,apple3:diskio.=,system:$,apple3:grafchars.=,system:$,apple3:grafdemo.=,system:$,apple3:hilbert.=,system:$,apple3:spirodemo.=,system:$,apple3:tree.=,system:$
  72. q
  73. **EOF
  74. echo